MacWorld 1999 August/Macworld (1999-08).dmg/Serious Software/Geo3D 1.4.3/Sample Scripts/Animation

Text File | 1999-03-23 | 237 b | 12 lines | [TEXT/ToyS]

tell application "Geo3D"
    activate
    make new document
    set x to import animation from file ":Sample Scripts:Demo.geo"
    if x > 0 then -- 0: error
        play
        repeat with x from 1 to x -- slower
            go to frame x
        end repeat
    end if
end tell